home *** CD-ROM | disk | FTP | other *** search
/ ADA Programming Guide / ADA Programming Guide.iso / ada_lrm / lr2sc.src < prev    next >
Text File  |  1996-01-30  |  754b  |  33 lines
  1.  
  2.  
  3. --                ON-LINE Ada LANGUAGE REFERENCE MANUAL
  4. --        Developed at Nofolk State University
  5. --        Development funded by a grant from the U. S. Army
  6. --        Project ReDTEA
  7. --        Version 1.0 released December 1988
  8. --        Programmer:        Esther M. Lumsdon
  9. --        Project Director:  George C. Harrison, PhD
  10.  
  11.  
  12.  
  13. with TEXT_IO; use TEXT_IO; 
  14. package MACHINE_SPECIFIC is 
  15.  
  16. ---------------
  17. -- PC/AT MS-DOS --
  18. --------------- 
  19.  
  20.   SCREEN_WIDTH  : NATURAL := 78; 
  21.   -- maximum number of characters that can be displayed on a line without wrap
  22.   -- value for MS-DOS
  23.  
  24.   SCREEN_HEIGHT : NATURAL := 24; 
  25.   -- line number on screen of location for prompts. Bottom line of screen.
  26.   -- value for MS-DOS
  27.  
  28.  
  29.  
  30.   procedure CLS; 
  31.  
  32. end MACHINE_SPECIFIC; 
  33.